home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 91 / 091.d81 / stealth boot (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  994b  |  28 lines
  1. 5 dv=peek(186):ifdv<8thendv=8
  2. 10 poke53281,0:poke53280,0:print"[147][159]"
  3. 20 gosub1000
  4. 30 sys57812"sb.dat",dv,0:poke780,0:poke781,0:poke782,96:sys65493
  5. 40 sys57812"stealth bomber",dv,0:poke780,0:poke781,112:poke782,23:sys65493
  6. 50 sys6000
  7. 55 print"[147]":poke53269,0
  8. 60 poke53272,21:poke53270,200
  9. 70 open15,8,15,"r0:hello connect=hello connect":input#15,er:close15
  10. 80 ifer<>63thenend
  11. 90 print"[147][144]load"chr$(34)"hello connect"chr$(34)",8"
  12. 100 print"run"
  13. 110 poke631,13:poke632,13:poke198,2:end
  14. 1000 poke214,3:print
  15. 1010 print"[154]      [211] [212] [197] [193] [204] [212] [200]   [194] [207] [205] [194] [197] [210]"
  16. 1020 print"[159]        [193]n [197]xplosive [195]hallenge   "
  17. 1030 print"  [155][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]"
  18. 1040 print"  [152]                                    "
  19. 1050 print"             [211][212][197][193][204][212][200] [194][207][205][194][197][210]           "
  20. 1060 print"   by [194]ob [194]lackmer   ([195])1991 [211][207][198][212][196][201][211][203] "
  21. 1070 print"        [208]ublished on [204][207][193][196][211][212][193][210] #91     "
  22. 1080 print"      [211]ubscriptions 1-800-831-2694    "
  23. 1090 print"            [193]ll [210]ights [210]eserved       "
  24. 1100 print"                                      "
  25. 1110 print"  [151][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185]"
  26. 1120 return
  27. 10000 open15,8,15,"s0:stealth boot":close15:save"stealth boot",8:end
  28.